From 7a4e9b42b9b71a17d65aa5d53fc838173b0a3e8e Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 7 Oct 2006 10:57:52 +0000 Subject: [PATCH] (mouse-insert-selection-internal): Use insert-for-yank, so that yank handlers are run. --- lisp/mouse-sel.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/mouse-sel.el b/lisp/mouse-sel.el index a327b589f54..a1209f827f1 100644 --- a/lisp/mouse-sel.el +++ b/lisp/mouse-sel.el @@ -737,7 +737,8 @@ If `mouse-yank-at-point' is non-nil, insert at point instead." (mouse-set-point event)) (when mouse-sel-get-selection-function (push-mark (point) 'nomsg) - (insert (or (funcall mouse-sel-get-selection-function selection) "")))) + (insert-for-yank + (or (funcall mouse-sel-get-selection-function selection) "")))) ;;=== Handle loss of selections =========================================== -- 2.30.2